home *** CD-ROM | disk | FTP | other *** search
/ IRIX 6.2 Development Libraries / SGI IRIX 6.2 Development Libraries.iso / dist / complib.idb / usr / share / catman / p_man / cat3 / complib / slansy.z / slansy
Text File  |  1996-03-14  |  3KB  |  133 lines
  1.  
  2.  
  3.  
  4. SSSSLLLLAAAANNNNSSSSYYYY((((3333FFFF))))                                                          SSSSLLLLAAAANNNNSSSSYYYY((((3333FFFF))))
  5.  
  6.  
  7.  
  8. NNNNAAAAMMMMEEEE
  9.      SLANSY - return the value of the one norm, or the Frobenius norm, or the
  10.      infinity norm, or the element of largest absolute value of a real
  11.      symmetric matrix A
  12.  
  13. SSSSYYYYNNNNOOOOPPPPSSSSIIIISSSS
  14.      REAL FUNCTION SLANSY( NORM, UPLO, N, A, LDA, WORK )
  15.  
  16.          CHARACTER NORM, UPLO
  17.  
  18.          INTEGER   LDA, N
  19.  
  20.          REAL      A( LDA, * ), WORK( * )
  21.  
  22. PPPPUUUURRRRPPPPOOOOSSSSEEEE
  23.      SLANSY  returns the value of the one norm,  or the Frobenius norm, or the
  24.      infinity norm,  or the  element of  largest absolute value  of a real
  25.      symmetric matrix A.
  26.  
  27.  
  28. DDDDEEEESSSSCCCCRRRRIIIIPPPPTTTTIIIIOOOONNNN
  29.      SLANSY returns the value
  30.  
  31.         SLANSY = ( max(abs(A(i,j))), NORM = 'M' or 'm'
  32.                  (
  33.                  ( norm1(A),         NORM = '1', 'O' or 'o'
  34.                  (
  35.                  ( normI(A),         NORM = 'I' or 'i'
  36.                  (
  37.                  ( normF(A),         NORM = 'F', 'f', 'E' or 'e'
  38.  
  39.      where  norm1  denotes the  one norm of a matrix (maximum column sum),
  40.      normI  denotes the  infinity norm  of a matrix  (maximum row sum) and
  41.      normF  denotes the  Frobenius norm of a matrix (square root of sum of
  42.      squares).  Note that  max(abs(A(i,j)))  is not a  matrix norm.
  43.  
  44.  
  45. AAAARRRRGGGGUUUUMMMMEEEENNNNTTTTSSSS
  46.      NORM    (input) CHARACTER*1
  47.              Specifies the value to be returned in SLANSY as described above.
  48.  
  49.      UPLO    (input) CHARACTER*1
  50.              Specifies whether the upper or lower triangular part of the
  51.              symmetric matrix A is to be referenced.  = 'U':  Upper triangular
  52.              part of A is referenced
  53.              = 'L':  Lower triangular part of A is referenced
  54.  
  55.      N       (input) INTEGER
  56.              The order of the matrix A.  N >= 0.  When N = 0, SLANSY is set to
  57.              zero.
  58.  
  59.  
  60.  
  61.  
  62.  
  63.                                                                         PPPPaaaaggggeeee 1111
  64.  
  65.  
  66.  
  67.  
  68.  
  69.  
  70. SSSSLLLLAAAANNNNSSSSYYYY((((3333FFFF))))                                                          SSSSLLLLAAAANNNNSSSSYYYY((((3333FFFF))))
  71.  
  72.  
  73.  
  74.      A       (input) REAL array, dimension (LDA,N)
  75.              The symmetric matrix A.  If UPLO = 'U', the leading n by n upper
  76.              triangular part of A contains the upper triangular part of the
  77.              matrix A, and the strictly lower triangular part of A is not
  78.              referenced.  If UPLO = 'L', the leading n by n lower triangular
  79.              part of A contains the lower triangular part of the matrix A, and
  80.              the strictly upper triangular part of A is not referenced.
  81.  
  82.      LDA     (input) INTEGER
  83.              The leading dimension of the array A.  LDA >= max(N,1).
  84.  
  85.      WORK    (workspace) REAL array, dimension (LWORK),
  86.              where LWORK >= N when NORM = 'I' or '1' or 'O'; otherwise, WORK
  87.              is not referenced.
  88.  
  89.  
  90.  
  91.  
  92.  
  93.  
  94.  
  95.  
  96.  
  97.  
  98.  
  99.  
  100.  
  101.  
  102.  
  103.  
  104.  
  105.  
  106.  
  107.  
  108.  
  109.  
  110.  
  111.  
  112.  
  113.  
  114.  
  115.  
  116.  
  117.  
  118.  
  119.  
  120.  
  121.  
  122.  
  123.  
  124.  
  125.  
  126.  
  127.  
  128.  
  129.                                                                         PPPPaaaaggggeeee 2222
  130.  
  131.  
  132.  
  133.